-SINCLAIR INFORMATION NOUVELLES- 
Ve H novembre @S 52.00 


Rédacteur: Réal Gagnon (544 Hermine £2 Québec P.Q. GIN 255) 
Ce bulletin est conçu avec l'aide d'un traitement de texte 
ТАЗНОВО II de Tasman Software (version 2068) 
et d'une imprimante SMITH-CORONA , Fastext 80. 


## DANS CE NUMERO ++ 


EPROGRAMME НА VOIX DU 2058, faites parler votre 2068 
XPROGRAMME SCONVERSION НЕХ-МЕС & DEC- HEY 
EPEOGRAMME TITRE JD, créer des pages-titres en 3D. 


+ECRAN 3D, « он йе 7 


SURFACE PLANE, un peu de graphisme 


+BELLE 6 ЧЕ , ew belt 3 жеу POS созы eS 


56 D (A 
TECHNIQUE ‘Ecrire à l'écran еп langage machine 
#LOGICIEL ФАКТ ATTACK (Spectrum) 
CHEQUERED FLAG {152058} 
MANIT (Spectrum) 
#PLUS des trucs sour le 2058 et l'actualité 


SEN лла аа н 


SINCLAIR MEUS | 


LANGAGES DISPONIBLES POUR LE 152088 
Pour ceux que le BASIC n'interezse plus HAWG SOFTWARE propose 
langages de programmation pour le 2068 а il s'agit 
ORTH et А erne le FORTH, il 


amm n 
d'un PASCAL, En св aui соп 
е и Fü 


= 
m Fig-FORTH et il vient avec un manuel de 

ix est environ 30% US . Le PASCAL est une 
ft PASCAL qui existe pour іе SPECTRUM. 11 
SAL très complet et il vient avec un manuel 

a es. Four plus d'informations au sujet du FORTH 


| 
HAUS 5 SOFTWAPE, Р.0. Drauer 7580, Little 
7, USé. Le FORTH est également disponible 
Mountain View Press inc., Mountain Vieus 


Pour ceux qui possède un cablosélecteur, le dimanche à 15108, 
ТУРО chaine 99 {canal 10) présente un émission qui s'appelle 
PIC gd mus E ЕДВАМ. Cette émission traits de 1а 
micro- iai F 


ЕД: communautaire (canal 9). М. Топу 
с son émission erk VIDEO. icicle 
ro nt aux logi poue COMMODORE 


ма 
hi n 
₪ 
me 


іў a une grosse rumeur qui circule en ce moment еп 
Angleterre voulant que Sinclair soit sur le point de mettre сув 

marché un 2. de 1208. Dans POPULAR COMPUTIMG WEEKLY 
ча ше description de ce SPECTRUM 128, зі 
ription ce nouveau SPECTRUM est bel et 
іе résultat d'un système de BANK 
е 2058. Un 


pue 
TICKS 


HEN IDEC ` DEG AH 


DK 


| REM НЕХ-ЪВЕС 
20 LET DEC-D: LET А=10: LET Beli: LET C=12: LET D-13: LET E-14 
LET F=13 
30 INPUT "НЕХ CODE: * LINE Hê 
25 FOR Ізі Tû LEN H$-1 
40 LET DEC C=DEC+ VAL HE(T) #44 LEN H£-D): MEXT I 


501 SEL VAL НЕ? 
80 PRI NT H $, DEC: 60 TO 20 
1 RE 
1B IN 
20 60! 
iU8 LE 
1Ш LET x= INT (a/16) u 
113 LET 07)+40+ש=ט‎ AND gg: LET а= CHE utat 
i70 IF a THEN GO TO 110 
180 IF INT ( LEM a$/2) ¿b LEN atil? THEN LET a$="D"+a$ 
190 RETURN 


| Programme: Belle Cassette | 


u ая. שש‎ rome t dE 
הפוגה שוג‎ те ₪ = 
שח‎ ₪ pour чи Б. 
1 REM PRESENTATION-CASSETTE 
כ ו‎ а о аад ии, 
1200 DIM b$(14,32): LET a$=" couper ici À 


5005 PRINT АТ 21,0:Че nom du programme? (Max. 15)" 

5010 INPUT AT 0,0: LINE РФ? USR 2351" USR 2351 

5020 PRINT AT 21,0;"Le tupa d'ordinateur? (Мах. 10)" 

5025 INPUT AT 0,0; LINE 0$? USR 21617 USR 2361 

5030 FOR 151 TO 13: PRINT АТ 21,0;'Le texte ігі, “Мах. 32)': I 
МРОТ АТ 0,05 LINE Tê! USR 2361" USR 2361 

5025 IF LEN T$ THEN LET béit, (15- LEN T$/2)+1 TO )=t$ 

5049 HEXT І: LPRINT a$ 

6020 CLE : PLOT 0,175: DRAW 255,0: LET FLAG=1: LET xx1=(255-1 LE 
א‎ P$z#16))/2-B: LET :170=טט‎ LET y$=P$: GO SUB 9000 

5025 PLOT 0,ҮҮ-2: DRAW 255,0: PRINT АТ 6,0; 

5030 FOR ісі TO 13: PRINT bêti): NEXT i 

6080 LET FLAG-Q: LET xx1-(256-( LEN 0$48))/2-B: LET uu=15: LET y 
#-û$: 60 SUB 9000 

6300 .- #0:1$: COPY 

6520 15: LET Yêzpêt' )'+0%+'(': LET XX1z0255-( | + 
LET yy=i? 175: CLS + 60 SUB 9000: PLOT D.uu-2: DRAW 255.0 

5800 PRINT АТ &40:0$,' CASSETTE" T 1$: COPY ; STOP 

9005 хх en PRINT АТ 21,0:u$ 

9018 FOR y=7 ד‎ СТЕР -1: FOR si Tû 255 

9020 IF NT ы THEN 50 SUE 9500: IF FLAG THEN LET YY2=YY 
бо SUR 95 ê си ҮҮ=ҮҮ2 

9020 LET >252+1+7| 6: xi LET uuruu-2-(29FLAG) ! ТЕТ хх2=х 
#1: NEXT ц: PRINT АТ дн EI Tü LEN u$): RETURN 

$500 РОТ xxZ.uut PLOT хх2+1.9ц 

9501 PLOT х2, чуні: РОТ хх, чу: RETURN 

9999 CAVE "pres саса”: VERIFY '": REM 6А6-089 


= nnn KANÊN лм. 


— — ESSRI de LOGICIELS | 


Май : ANT ATTACK (Spectrum) 
ТҮРЕ  : Jeu 
EDITEUR: QUICKSYLVA 


Vous etes dans une ville appelée ANTESCHER et vous devez 
sauvez une jeune fille (ou un jeune garçon selon le саз), mals 
attention il y a des fourmis géantes qui vous poursuivent sans 
relache. ANT ATTACK est un classique. L'animation est sublime. 
Hous avons un vue en 2) (genre IAXXON).avec possibilité de š 
angles de vue différents. L'action est trés rapide. Bouez assu 

е ce nî le genre de jeu auquel l'on joue 5 minut 
ашап veut plus rien savoir par la suite,au contraire ANT ATTACK 

+ 115 


jonnant, Les Anglais appellent ce genre de jeu * ап 
addictive game а et ils ont raison s.. 


Ном : CHEQUERED FLAG (752058) 
ТҮРЕ! Simulation 
EDITEUR: PSION 


5: votre reve est de conduire une FORQULE 1,24 bien CHEQUERED 
FLAG est pour vous. Vous avez le choix entre 3 types de FORMULE 
: 2 ב‎ transmission manuelle et l'autre (sour les débutants...) 
transmission automatique. Vous avez également le choix entre 
10 parcours différents. Le but ect de compléter le parcours sans 
faire trop d'accidents et avec le meilleur temps possible. Sur 

f á 


la piste,il faut éviter les éternelles taches d'huile et dez 
éclats de verre brisé, Il faut également surveiller 18 niveau 
sence et éviter le zurchauffement du moteur,si nous avons un 


Un autre classique du GPECTRUM. Il s'agit de guider HILLY à 


fférentes cavernes.dans chaque caverne WILLY doit 
rouver un certaine nombre de clés pour pouvoir passer à la 
suivante. [e феи demande de Іа stratégie et de 

жа. Bt beaucoup de patience. 11 ч а ше dizaine de 
x différents. L'animation est d'une qualité incroyable et 
i rapide. Donc plusieurs heures de bonheur 
szuré avec MANIC HINER pour Spectrum... 


77 == 


| Technique:ECRIRE en C.H. 


'assembleur du Z BO possëde une instruction spéciale pour 
écrire du texte à l'écran. Cette instruction a pour nom RST 15, ` 
ST signifie Re§Tart. L'utilisation de cette instruction est 
très simple. En premier lieu, il suffit de charger 
l'Accumulateur avec le code ASCII (qui correspond au caractère 
que l'on veut afficher) et on fait ВЕТ 16. Si on veut afficher 
la lettre 'A',dont le code ASCI est &5,nous faisons: LD A,65 et 


Mais que faire si nous voulons afficher un "A" sur la dixième 
ligne et à la dixième colonne. Regardons dans le 2068 USER 
MANUAL à la page 227 la liste des codes ASCII. Nous remarquons 
aue le сода 22 correspond au caractére de controle AT. Ainsi 
pour afficher sur la ligne 10 et à la colonne iD,nous faisons: 

LD AZZ Н 
RST 15 ; 
LD 0 H 


пост £ 
וכח‎ lê 


LE êl ;calonne 10 
RET 15 

LD А, 55 ісоде "A" 
RST 16 

ВЕТ 


kinsi pour une couleur PAPER différente: 


LD A.17 scontrole INR 
RST 6 
LD 5 icouleur CYAN 


Comme nous pouvons la constater 


1 te 
d'afficher un texte complet de cette Ғабоп, L 


+ 
appelée PR-STRING, aui va nous donné un coup de m 
ic 7 


са ш 


س אע 


ORG 40900 

LD 8 15 codes à afficher 
LD 15,90000 rage, des codes 
CALL 8667 ;PR_STRING 

RET retour- BASIC 


085 50000 
DEFB 22,20,15 


; 
1 

z Е a 

DEFE "S, I'N inatre message 


Voici une petite routine qui démontre une technique 
в de petit message (ex. messages d'erreur), Hous 
chargeons А avec le code d'identification du message à afficher, 
Puis HL avec l'ad départ de la zone de recherche ВС est 
la longueur de cette zone. L'instruction CPIR signifie ConPare 
contenu de HL avec Asi la 
=Ü) alors HAAL et РСЕВС- 


ORG 40000 loop INC HL 

LE Aí 1 10005 du message LD A {HL} ASCII 
LE HL,45000 зай”. de départ RST 16 jaffiche 
LD 26,5000 Попа, de la zone DIN? loop :BRC-07 
CPIE . RET ;- BASIC 
JP Zok 3&7 (HL)-->ak ÖRG 50000 


АЗН 
1202 ~- BASIC mess ГЕРЕ 1,3; "5, "1,94 


то 
rm 
-4 


+ 


ак LD Е.Н] гіппа. du message DEFE 2,8," "А, 6 
PUSH RC initialisation de ПЕЕВ 'A,'Z,' E, "М 
PUEH HL il'écran. DEFE "Е 
}А=1 DEFB 3,8,'T,'8,'2 
Н DEFE "Û, "6,8 


X = en 0 шд? 


КОТЕ: Pour ma рагі, 1а programmation en language machine ne peut 
se faire EFFICACEMENT sans un ASSEMBLEUR. C'est pour cette 
raison que je n'ai pas inclus les équivalents décimaux 
תת‎ 
ще 


DENEN 


₪ LI r SCH 


Or Т! Gr je 
mm а Hi ₪ rê пп 


fa 
ique quelconque. La 


is 
nat cassette. Puis le 162 
lise дапа 585 і.е. la 
la routine machine "ENT ENDRE" 
келе? és par le 58, іа 


programme vous 


₪ 
233 326, on 


[PTT 


our utiliser 
і 


avez 1 


machines, 


raê, 
2058", 


ыу‏ ההות 
нопоте‏ 


т! 
се 
Э 
Gel 
лак] 
а 
m 
c 


₪ 
Tu 


Ргазгалте : JEL barrage 


5 5 

18 БЕ ВЕСЕ 

Ра РЕ 

38 REH Шз בד‎ 
ied GO SUB тда 
185 НЕМ Ki TON ZDIFFPTCULTE”] 
.118 PRINT ההזי‎ 9;"B R R RR ₪ E 
; TBB 8," ===” 


115 BORDER 5 

120 PRINT ‘TAB 5;"Uous etes en 
possession de"''THB 3;"« 188 bom 
bes et 5 avions ההדיי";‎ 2;"pour 
completer votre mission" 

128 PRINT ‘TAB 5;"Cle 727 pour 
descendre” TRAB S; "Cle “т” pour г 
emonter'" 

139 PRINT "יי‎ ENTREZ LE NIVEAU 
DE DIFFICULTE "Top 5;"( 1-5 1 
S est tent " 

158 INPUT sp: IF sp«1 OR 5р›5 T 
HEH GO TO 158 

158 PRINT ’TAR 1;" LE NOHBRE DE 

BARRRGE ВАГОН” ‘TRE 6;"( 28-68 

) 28 est facite" 

178 INPUT ba: IF ba«28 OR Ьазба 
THEN GO TO 178 

133 LET 6058: LET sc-e 

198 CLS 

Рав REH Евра Ur 

218 FOR n-i ТО ba 

220 LET v-INT (RND+F18) +3 

238 LET h-INT (RHD£32): IF בצח‎ 
THEN LET h-3 

240 PRINT AT v,h; INK 4;CHR$ 14 
в. 

258 NEXT п 

£68 PRINT ЯТ 21,8; “ВОНВЕ5- ";5с 
: ВЕЕР .2,280 

278 IF sc=1a9 THEN GO TO saa 

ESS PRINT AT 21,15;" AHUION- ";c 


298 IF сг=5 THEN GO TO 538 

285 PAUSE 8 

300 НЕМ BEXT TIR 

318 LET v-INT iRND£18)43 

328 FOR һ-й ТО 31 

338 LET с%-ІМКЕҮ% 
ou с$="" THEN PRINT ЯТ v,h- 

; 

358 IF STICK )1,1(>2 OR c&z"z" 
THEN PRINT AT v,h-1;" ": LET vv 
+1: IF узга THEN LET wa 

3568 IF STICK (1,1)-1 OR c&-"m" 
THEN PRINT HT v,h-1;" ": LET хаў 
-1: IF v«à THEN LET уай 

378 IF Һ=31 THEN GO TO 589 

330 IF BTTR ív,h)-60 THEN PRINT 

BT v,h; INK 2; FLASH 1; BRIGHT 
1; CHR$£ 147: FOR п=1 TO 25: ВЕЕР 
.05,-15: ВЕЕР .1,15: NEXT n: PRI 
NT AT v,h;" ": LET cr=cr+1: GO T 
а 288 

398 PRINT HT v,h;CHRE 4 

488 PAUSE sp 

418 NEXT bh 

Зав REM FIN DE 19 PARFIE. | 

518 PRINT BT 18,18; INK 3; FLAS 
H 1;" MISSION TERMINEE ^ 

528 STOP 

S30 PRINT דה‎ 19,18; INK 3; FLAS 
H 1;" AVION DETRUIT " 

S48 STOP 

588 REH - -==-0%כ‎ 08 

618 FÜR паза то 29 STEP -.5 

628 ВЕЕР .85,n 

өза NEXT n 

048 FOR х-1 TO 15 

658 ВЕЕР ,85,-25: ВЕЕР .05,-35: 


ВЕ 

558 

Б?а 

өзе 

таа =. 

718 DATA 3* 15, 24,155,255 „15 5, 
24,15,0,"d", 145, ER 36, 9,145, ER А 
145,"e",8,8,128, 253,255,253, 158; 
е 

728 FOR п-і TO 3 

738 RERHD аз 

748 FOR аза TO 7 

798 READ b: POKE USR ажға,ь 

750 NEXT a 

770 NEXT n 


saê RETURN 


HIS 


` Program 


Ў; REM ECRAN 3D sur une idee de J, HUNTON _______ 556-085 
10 oi T 9): PRINT АТ 20,0; INVERSE 1:"3D WORDS base sur u 
ne idee de JOHN HUNTON": RANDOMIZE USR 2251: RANDOMIZE USR? 
361 
rosseur des lettres (1-3)i"igrosseur’ USR 2 
üsseurzl OR grosseur; THEN Gû TO 20: 
ötre phrase peut contenir ''i'9* AND gross 
ur=2)+{f£" AND gro sseur- i au maximun": 
* USR 236t' USR 
IM eis de quelle lignea" "ди haut (HiP n 
USR 2 SR 2251: LET 8 
35 INPUT АТ ü,Di'Encre (D-7):'i&' "Papier (ü-7):'ipap'"' USR 2 
261' USR 2351; INK в: PAPER pap: BORDER рар: PAUSE SD: CLS 
100 PRINT INK papi АТ 21.0:a$: LET а= LEM a$ 
110 FOR f 8 и nz TO 7 
120 IF 01 THEN Gû TO 170 
130 по ins AND grozseur-zi))nX4t(grnsseunrzi)*14 
9-6 AND ЖАНДЫРДЫ 
45 DRAW 0,-2: DRAN 3,0: DRAW 0 
D DRAH -2.0: DRAN 0,-1: DRAN NT DRAH -2,-2 
із BRAN 5,5: DRAW 0,4: ОҒАН 0.-5: DRAW 4,0: DRAH 0,4: DRAH Q, 
DRAH -5,-5 
ü DRAW 0,4: DRAN 5,5: DRAW -4,0: DRAN -5,-5 
70 NEXT п; NEXT f: PRINT AT 21.0:0$(1) 
Û PRINT 30111 COPY [2] STOP [3] ECRITURE" 
LET i$- INREYê : IF i$="" THEN Gê TO 2 T 
230 IF i$="1" THEN INPUT "i COPY : 60 TO 21 
IF i$z"2" THEN STOF 
IF i$ 60 TO 1000 
50 


к-ч 


USE o 


E E 
Four aue le 20 


255651NT 1500807255 


rı1 
ee 


éi 


ы 


inopérant. 


АК 


RE 


בכן 
ка‏ 
E‏ 
tu‏ 
co‏ 


п 


9 


AL "š 


Ж 


ELE 


VAL " 


EP 


JE input 


SU 


ü 


б 


“ац mot 8": 


= 
== 
== 


ЕТ pë 


А 1; L 


) 
тз 
m 
я 
м 
~r 


leza 


i 


jê LET 
PRINT אי‎ 


IF lecze THEN 


2019 


e 
z 
mH 
= 
= 
De] 
= 
(в - 
+ 
= 
= 
гэ 
D 
ІН 
+8. 
ш 
2 
са 
5 
e 
+ 
Ше 
- 
= A 
с. 
я = 
| E 
id 
Ж 
.. 
E 
52 


D ай 
т " 
E 2 
ы + 

й ₪3 
b CH 
v га 
сш 

вс 

H" 

Et 


"E 
шы 


7 
Ce programme vous permet de creer des pages en 3D. 


i REM ____ TITRE 3D |. 

5 BORDER ü: PAPER 0: INK 7: CLS : INPUT Че Messager"; LINE k 
IF LEN k$225 THEN xh k$-k$( TO 23) | 
20 FOR әгі TO LEN k$: (аза! * THEN NEXT o 
30 LET sira; e x-0-1: 2 чаў: LET 1%=к%(0) 


60 SUB 140: NEXT o: STOP 

140 IF Si OR xz) OR уай OR 5134324 OR 5141 ОВ 188" OR 18€" 

* THEN PRINT АТ 1 

150 LET сөзі PEEK 21604)+(( PEEK 21407)#246): LET c= CODE 1$: L 
ЕТ сртрэт(сед) 

180 GO SUB 300: LET cos 

200 FOR s=1 Tû si 

210 FOR n=0 TO 7: LET (%238+0)+א+81+(%12()-8))+18104=פטס‎ 1 IF сат 


si THEN LET ср=ср+1: LET 0 
349 LET co=coti: POKE pos, РЕЕК с 
280 ІР u=8 OR у=15 THEN Bû ӘЛ 200 
290 NEXT s: RETURN 
500 - ка ай к 


PROGRAMME: SURFACE PLANE 8 4 


1 REM SURFACE PLANE 

10 FOR 1-1T0 1.2 STEP 1/5: FOR Y--1 TO 1 STEP 1/75 

20 60 SUB 1000: NEXT Y: NEXT X 

30 FOR Y--1 Tû 1.2 STEP 1/5: FOR X--1 TO 1 STEP 1/75 
40 GO SUS 1800: NEXT X: NEXT Y: STOP 

1800 LET Z-YsXxX: LET P=(X+Y*,7)#50: LET Gite, 71550 

1010 PLOT ו‎ RETURN 


4733 REH Pour obtenir des figures 

sn as, hanner la la valeur de la variable z {lion 
3000 REM differentes, changer la la valeur de la variable ап 
в 1005 

BEM Uniri‏ פההם 

002 REH. 1% 


ко 
₪ 


5010 LET 
5020 LET z 


= לה‎ 
spag i 


